#!/usr/bin/perl
#shutdown-lib.pl


do '../web-lib.pl';

&init_config();

sub mdm_shutdown()
{
        my ($out);
	$out = `shutdown -h now`;
	return "Success";
}

sub mdm_reboot()
{
        my ($out);
	$out = `shutdown -r now`;
	return "Success";
}

1;
